<?
//error_reporting(E_ALL);
//ini_set('display_errors', '1');

include ("../conectar.php"); 
include ("../funciones/fechas.php");
include ("../funciones/numeros.php");  
include ("../include/tables_definition.php");

$accion=$_POST["accion"];
if (!isset($accion)) { $accion=$_GET["accion"]; }

$cob=0;

function valor_cobrar($fila,$cuota,$moneda_fac)
{    
	global $cob;

	//echo "fila: ".$fila."<br>";
	//echo " - cob: ".$cob."<br>";
	$vceldas=explode("~",$fila);

	$moneda=$vceldas[1];
	$sql="SELECT codigo FROM moneda WHERE descripcion like '%$moneda%'";
	$rs=mysql_query($sql);
	$moneda=mysql_result($rs,0,"codigo");

	$cotizacion=$vceldas[2];    
	$valor=$vceldas[3];

	//echo "moneda: ".$moneda." - cotizacion: ".$cotizacion." - valor: ".$valor."<br>";

	//$valor=str_replace(".","",$valor);
	//$valor=str_replace(",",".",$valor);
	$valor=coma2decimal($valor);

	//$cotizacion=str_replace(".","",$cotizacion);
	//$cotizacion=str_replace(",",".",$cotizacion);
	$cotizacion=coma2decimal($cotizacion);

	//echo "moneda: ".$moneda." - cotizacion: ".$cotizacion." - valor: ".$valor."<br>";

	if($cotizacion != "")
	{
		if($moneda == 1)
		{
			$cob+=($valor/$cotizacion);
		}
		else
		{
			$cob+=($valor*$cotizacion);
		}
	}
	else
	{
		$cob+=$valor;
	}

	//echo "cob: ".$cob."<br>";
	$dif=$cuota - $cob;
	//echo "cuota: ".$cuota." - cob: ".$cob." - dif: ".$dif."<br>";

	if($moneda_fac == 1)
	{		
		if($dif!=0 && abs($dif) < 1000)
		{
			$cob+=$dif;
		}
		$cob=round($cob,0);
	}
	else	
		$cob=round($cob,2);

	//echo "cob final: ".$cob."<br>";
	return $cob;
}



$hoy = date('Y-m-d H:i:s',time());

if ($accion=="alta") {
	//datos
	$cuentas_c=$_POST['cuentas_cobros'];
	$cod_moneda_c=$_POST['moneda_cobros'];
	$fecha_c=explota($_POST["fecha_cobros"]);
	$total_c=$_POST['total_cobros'];
	$cobrado_c=$_POST['cobrado_cobros'];
	$diferencia_c=$_POST['diferencia_cobros'];
	$tabla_c=$_POST['tabla_cobros'];

	/*
	echo  'Fecha: '.$hoy.'<br>'.
	      'cuentas: '.$cuentas_c.'<br>'.
	      'fecha: '.$fecha_c.'<br>'.
	      'total_c: '.$total_c.'<br>'.
	      'cobrado_c: '.$cobrado_c.'<br>'.
	      'diferencia_c: '.$diferencia_c.'<br>';
	      //'tabla: '.$tabla_c.'<br>';
	*/
	//************** ultimo valor de codigo de transaccion ***************
	$sel="SELECT max(codigo) as maximo,max(cod_transaccion) as mt FROM cuentas_cobrar_detalles";
	$rs=mysql_query($sel);
	$codigo=mysql_result($rs,0,"maximo")+1;
	$codigo_trans=mysql_result($rs,0,"mt")+1;

	//************** cantidad de decimales ****************
	$sel_mon="SELECT decimales FROM moneda WHERE codigo=$cod_moneda_c";
	$rs_mon=mysql_query($sel_mon);
	$decimales=mysql_result($rs_mon,0,"decimales");

	$vcuentas=explode(",",$cuentas_c); 
	//formato fila de la tabla cobros, todos en texto, sin ningun codigo
	// forma_pago, moneda, cotizacion, valor, nro_cheque, cuenta_cheque, banco, fecha_cheque, fecha_cheque_venc, librador, cuenta_destino
	$vfilas=explode("@",$tabla_c);
	
	//*************************
	//*** calcular el saldo ***
	//*************************
	$monto=0;
	$monto2=0;
	$tot=str_replace(".","",$total_c);

	for($i=0;$i < sizeof($vfilas)-1;$i++)
	{
	      //echo "fila: ".$vfilas[$i]."<br>";

		$vceldas=explode("~",$vfilas[$i]);

		// Valores numericos
		//$valor=str_replace(".","",$vceldas[3]);	      
		//$valor=str_replace(",",".",$valor);
		$valor=coma2decimal($valor);
		
		//$cotizacion=str_replace(".","",$vceldas[2]);
		//$cotizacion=str_replace(",",".",$cotizacion);
		$cotizacion=coma2decimal($cotizacion);

//fede agrego esto para recuperar la moneda
	      $sql_fp="SELECT codigo,cod_moneda FROM formapago WHERE descripcion like '%$vceldas[0]%'";
	      //echo $sql_fp."<br>";
	      $rs_fp=mysql_query($sql_fp);
              $moneda=mysql_result($rs_fp,0,"cod_moneda");                
                
/*                
 *fede comento esto por el tema de moneda
		$moneda=$vceldas[1];
		$sql="SELECT codigo FROM moneda WHERE descripcion like '%$moneda%'";
		$rs=mysql_query($sql);
		$moneda=mysql_result($rs,0,"codigo");
*/
	      //echo "valor: ".$valor." - cotizacion: ".$cotizacion." - moneda: ".$moneda."<br>";
	      if($cotizacion != "")
	      {
		  if($moneda != 1)//Guaranies
		  {     $monto+=$valor*$cotizacion; // valor*cotizacion
			$monto2=$valor*$cotizacion; // valor*cotizacion
		  }
		  else
		  {     $monto+=$valor/$cotizacion; // valor/cotizacion
			$monto2=$valor/$cotizacion; // valor/cotizacion
		  }
	      }
	      else
	      {	   $monto+=$valor; //valor
		   $monto2=$valor; //valor
	      }

	      //echo "monto: ".$monto." - monto2: ".$monto2."<br>";
	}
	$saldo=$monto-$tot;
	
	if($cod_moneda_c == 1)
	{	      
	      if($saldo!=0 && $saldo<100)
	      {
		  $saldo-=$saldo;
	      }
	}
	
	//*********************************
	//*** sumar pagos ya realizados ***
	//*********************************

	for($i=0;$i < sizeof($vcuentas); $i++)
	{	$sql="SELECT valor_cobrado FROM ".CUENTAS_COBRAR_TABLE." WHERE nro_ctas_cobrar=$vcuentas[$i]";	
		$rs=mysql_query($sql);
		$valor_pagado=mysql_result($rs,0,"valor_cobrado");

		if($valor_pagado != "")
		{	//$valor_pagado=str_replace(".","",$valor_pagado);
			//$valor_pagado=str_replace(",",".",$valor_pagado);
			$valor_pagado=coma2decimal($valor_pagado);
		
			$saldo+=$valor_pagado;
		}
	}

	$saldo=number_format($saldo,$decimales,",",".");

	//echo "saldo: ".$saldo."<br>";

	//insertar en cuentas_cobrar_detalles
	for($i=0;$i < sizeof($vfilas)-1;$i++)
	{
	      $vceldas=explode("~",$vfilas[$i]);
	      	      
	      //obtener codigos de los datos
	      // ****** formas de pago ******
	      $sql_fp="SELECT codigo,cod_moneda FROM formapago WHERE descripcion like '%$vceldas[0]%'";
	      //echo $sql_fp."<br>";
	      $rs_fp=mysql_query($sql_fp);
	      $cod_forma_pago=mysql_result($rs_fp,0,"codigo");
              $cod_moneda=mysql_result($rs_fp,0,"cod_moneda");

	      // ****** moneda ******
              //fede, se agrega decimales al query              
	      //$sql_mon="SELECT codigo,decimales FROM moneda WHERE descripcion like '%$vceldas[1]%'";
              $sql_mon="SELECT codigo,decimales FROM moneda WHERE codigo = $cod_moneda";
	      //echo $sql_mon."<br>";
	      $rs_mon=mysql_query($sql_mon);
	      $cod_moneda=mysql_result($rs_mon,0,"codigo");
              $decimales=mysql_result($rs_mon,0,"decimales");

	      // ****** banco ******
	      if($vceldas[6] != "")
	      {
		  $sql_banco="SELECT codigo FROM bancos WHERE descripcion like '%$vceldas[6]%'";
		  //echo $sql_banco."<br>";
		  $rs_banco=mysql_query($sql_banco);
		  $cod_banco=mysql_result($rs_banco,0,"codigo");
	      }
	      else
		  $cod_banco=0;

	      // ****** cuenta destino******
	      $sql_cuenta_destino="SELECT codigo FROM tesoreria_cuentas WHERE descripcion like '%$vceldas[10]%'";
	      //echo $sql_cuenta_destino."<br>";
	      $rs_cuenta_destino=mysql_query($sql_cuenta_destino);
	      $cod_cuenta_destino=mysql_result($rs_cuenta_destino,0,"codigo");
	   
    	      /*
	      echo  'Forma de pago: '.$vceldas[0].' cod: '.$cod_forma_pago.'<br>'.
		    'Moneda: '.$vceldas[1].' cod: '.$cod_moneda.'<br>'.
		    'Cotizacion: '.$vceldas[2].'<br>'.
		    'Valor: '.$vceldas[3].'<br>'.
		    'Nro cheque: '.$vceldas[4].'<br>'.
		    'Nro cuenta : '.$vceldas[5].'<br>'.
		    'Banco: '.$vceldas[6].' cod: '.$cod_banco.'<br>'.
		    'Fecha cheque: '.$vceldas[7].'<br>'.
		    'Fecha venc cheque: '.$vceldas[8].'<br>'.
		    'Librador: '.$vceldas[9].'<br>'.
		    'Cuenta destino: '.$vceldas[10].' cod: '.$cod_cuenta_destino.'<br>';
	      */ 

		//$valor=number_format($vceldas[3],$decimales,",",".");
		$valor=$vceldas[3];
	      for($j=0;$j < sizeof($vcuentas);$j++)
	      {
		$ins="INSERT INTO cuentas_cobrar_detalles 
		      (codigo,cod_transaccion,cod_cuenta,fecha,cod_forma_pago,cod_moneda,cotizacion,valor,saldo,cheque_nro,
			cuenta_nro,cod_banco,fecha_cheque,fecha_venc_cheque,librador,cod_cuenta_destino) 
		      VALUES ($codigo,$codigo_trans,$vcuentas[$j],'$hoy',$cod_forma_pago,$cod_moneda,'$vceldas[2]','$valor','$saldo',
			      '$vceldas[4]','$vceldas[5]',$cod_banco,'$vceldas[7]','$vceldas[8]','$vceldas[9]',
			      $cod_cuenta_destino)";
//echo $sql."<br>";                
		//echo $ins."<br>";
		//$rs=mysql_query($ins);
                //fede cambio para que pueda imprimir los resultados.
                $rs_operacion=mysql_query($ins);
                
                /*fede se agrega la gracacion de la tabla cobros_clientes*/
                $valor=number_format($valor,$decimales,".","");
                $saldo=number_format($saldo,$decimales,".","");
                
                try {
                    $sql="INSERT INTO cobros_clientes (
                        nro_ctas_cobrar,
                        cod_cliente,
                        cod_cobrador,
                        fecha_cobro,
                        hora_cobro,
                        nro_reci,
                        total_cob,
                        total_det,
                        observacion,
                        cod_moneda,
                        usuario_cobro,
                        force_upd,
                        nro_operacion,
                        rpfecha) VALUES (
                        $vcuentas[$j],
                        0,
                        0,
                        '$hoy',
                        null,
                        null,
                        $valor,
                        $saldo,
                        '',
                        $cod_moneda,
                        null,
                        0,
                        $codigo_trans,
                        null)";     
echo "sql : ".$sql."<br>";                    
                    $rs_operacion=mysql_query($sql);
                    $id_cobros_clientes = mysql_insert_id();                
                    
                    $sql="INSERT INTO cobros_clientes_documentos (nro_cobro,
                    tipo_documen,
                    nro_documento,
                    nro_cuota,
                    valor_cobrado,                    
                    contabilizado,
                    procesado_sync,
                    rpfecha) VALUES(
                    $id_cobros_clientes,
                    0,
                    0,
                    0,
                    0,
                    0,
                    0,
                    null
                    )";
                    $rs_operacion=mysql_query($sql);                
echo "sql : ".$sql."<br>";                
                    $sql="INSERT INTO cobros_clientes_formas (
                    nro_cobro,
                    cod_condicion,
                    cod_banco,
                    cuenta,
                    nro_cheque,
                    fecha_cheque,
                    fecha_ch_emision,
                    descontado,
                    rechazado,
                    porc_desc_che,
                    cod_banco_desc,
                    librador,
                    cod_tarjeta,
                    baucher,
                    nro_nota,
                    importe,
                    cod_moneda,
                    cotizacion,
                    efectivo,
                    vueldo,
                    cod_moneda_vueldo,
                    nro_anticipo,
                    nro_cuenta,
                    nro_planilla,
                    procesado,
                    contabilizado,
                    nro_asiento,
                    cotizacion_vuelto,
                    force_upd,
                    nro_boleta,
                    nro_orden,
                    telefono,
                    rpfecha) VALUES(
                    $id_cobros_clientes,
                    0,
                    0,
                    NULL,
                    0,
                    NULL,
                    NULL,
                    0,
                    0,
                    0.000,
                    0,
                    NULL,
                    0,
                    NULL,
                    0,
                    0.00,
                    0,
                    0.0000,
                    0.00,
                    0.00,
                    0,
                    0,
                    0,
                    0,
                    0,
                    0,
                    0,
                    0.0000,
                    0,
                    0,
                    0,
                    NULL,
                    NULL)";          
                    $rs_operacion=mysql_query($sql);                                                    
echo "sql : ".$sql."<br>";                    
                } catch (Exception $e) {
                    echo 'Excepción capturada: ',  $e->getMessage(), "\n";
                }                
		$codigo++;
	      }

		//***************************************************************
		//*************** actualizar valor en tesoreria *****************
		//***************************************************************

		//echo "<br>TESORERIA <br>";

		$sql_cuenta_destino="SELECT codigo,valor,moneda FROM tesoreria_cuentas WHERE descripcion like '%$vceldas[10]%'";
		//echo $sql_cuenta_destino."<br>";
		$rs_cuenta_destino=mysql_query($sql_cuenta_destino);
		$cod_cuenta_destino=mysql_result($rs_cuenta_destino,0,"codigo");
		$valor=mysql_result($rs_cuenta_destino,0,"valor");
		$moneda_tes=mysql_result($rs_cuenta_destino,0,"moneda");

/*
		$sel="SELECT valor,moneda FROM tesoreria_cuentas WHERE codigo=$cod_cuenta_destino";
		$rs=mysql_query($sel);
		$valor=mysql_result($rs,0,"valor");
		$moneda_tes=mysql_result($rs,0,"moneda");
*/
		$sel="SELECT decimales FROM moneda WHERE codigo=$moneda_tes";
		$rs=mysql_query($sel);
		$decimales_tes=mysql_result($rs,0,"decimales");

		if($valor=="")//primera vez
			$valor=0;
	
		$valor_tes=coma2decimal($valor);
		//$valor_tes=number_format($valor,$decimales_tes,".","");		

		//valor del pago
		$valor2=coma2decimal($vceldas[3]);
		$valor_tes+=$valor2;

		$valor_tes=number_format($valor_tes,$decimales_tes,",",".");

		$upd="UPDATE tesoreria_cuentas SET valor='$valor_tes' WHERE codigo=$cod_cuenta_destino";
		//echo $upd."<br><br>";	
		$rs=mysql_query($upd);

	}

	//*****************************
	//****** cuentas cobrar *******
	//*****************************
	//echo "<br>CUENTAS COBRAR<br>";

	//$tot_monto=$monto;
	//echo "Monto: ".$monto."<br>";
	$tfilas=sizeof($vfilas)-1;
	$x=0;
	for($i=0;$i < sizeof($vcuentas);$i++)
	{		
 		//echo "cuenta nro: ".$vcuentas[$i]."<br>";
		$sql="SELECT valor,valor_cobrado FROM ".CUENTAS_COBRAR_TABLE." WHERE nro_ctas_cobrar=$vcuentas[$i]";
		//echo $sql."<br>";
		$rs=mysql_query($sql);
		$valor_cuota=mysql_result($rs,0,"valor");
		$valor_pagado=mysql_result($rs,0,"valor_cobrado");

		//$valor_cuota=str_replace(".","",$valor_cuota);	      
		//$valor_cuota=str_replace(",",".",$valor_cuota);
		$valor_cuota=coma2decimal($valor_cuota);

		//$valor_pagado=str_replace(".","",$valor_pagado);	      
		//$valor_pagado=str_replace(",",".",$valor_pagado);
		$valor_pagado=coma2decimal($valor_pagado);

		if($valor_pagado != 0)
		  	$cob=$valor_pagado;

		//echo "cuota: ".$valor_cuota." - valor_pagado: ".$valor_pagado." - cob: ".$cob."<br>";

		if($x < $tfilas)//&& $cob < $valor_cuota)
		{	
			$cob=valor_cobrar($vfilas[$x],$valor_cuota,$cod_moneda_c);
			//echo "cob: ".$cob."<br>";
		}

		if($cob >=  $valor_cuota)
		{	
			$valor_pago=$valor_cuota;
			$cob-=$valor_cuota;
		}
		else
		{
			while($x < $tfilas && $cob <= $valor_cuota)
			{
			      //echo "x: ".$x."<br>cuota: ".$valor_cuota;
			    
			      $valor_pago=$cob;
			      $x++;
			      if($x < $tfilas)
				  $cob=valor_cobrar($vfilas[$x],$valor_cuota,$cod_moneda_c);	   
			}

			if($x == $tfilas)
			{    $valor_pago=$cob;
			     $cob=0;
			}
			else
			{    $valor_pago=$valor_cuota;
			     $cob-=$valor_cuota;
			}
			//$cob-=$valor_cuota;
		}

		//estado
		if($valor_pago == $valor_cuota)
			$estado=2;
		else
		{	
			if($valor_pago < $valor_cuota)
		    		$estado=1;
		}

		$valor_pago=number_format($valor_pago,$decimales,",",".");
		//echo "valor_pago: ".$valor_pago."<br>";


		$fecha_pago = date('Y-m-d',time());
		if($valor_pago != 0)
		{	$sql_upd="UPDATE ".CUENTAS_COBRAR_TABLE." SET valor_cobrado='$valor_pago', estado='$estado', fechas_cobro='$fecha_pago' WHERE codigo=$vcuentas[$i]";
			//echo $sql_upd."<br>";
			$rs_upd=mysql_query($sql_upd);    

			//auditoria			
			$ins="INSERT INTO auditoria (tabla,operacion,descripcion,fecha_hora)
			  VALUES ('".CUENTAS_COBRAR_TABLE."','actualizar','Se actualizo la cuenta $vcuentas[$i] en fecha $hoy el valor pagado = $valor_pago y el estado  = $estado','$hoy')";
			$rs=mysql_query($ins);

		}

		//echo "cob resto: ".$cob."<br>";
		if($x < $tfilas)
			$x++;

    		//echo "x final: ".$x."<br><br>";

		//*********************************************************************
		//*************** actualizar en factura si necesario ******************
		//*********************************************************************
		$sql="SELECT cod_factura FROM ".CUENTAS_COBRAR_TABLE." WHERE nro_ctas_cobrar =$vcuentas[$i]";
		//echo $sql."<br>";
		$rs=mysql_query($sql);
		$cod_factura=mysql_result($rs,0,"cod_factura");

		$sel="SELECT count(nro_ctas_cobrar) as cant FROM ".CUENTAS_COBRAR_TABLE." WHERE cod_factura=$cod_factura";
		$rs=mysql_query($sel);
		$cant_cuotas=mysql_result($rs,0,"cant");

		$sel="SELECT count(nro_ctas_cobrar) as cant FROM ".CUENTAS_COBRAR_TABLE." WHERE cod_factura=$cod_factura AND estado='2'";
		$rs=mysql_query($sel);
		$cant_cuotas_pagas=mysql_result($rs,0,"cant");

		//echo "Cant. cuotas: ".$cant_cuotas."<br>Cuotas pagadas: ".$cant_cuotas_pagas."<br>";
		if($cant_cuotas == $cant_cuotas_pagas)
		{
		      $upd="UPDATE facturas SET estado='2', cuotaspagas=$cant_cuotas_pagas WHERE codfactura=$cod_factura";
		      //echo $upd."<br>";	
		      $rs=mysql_query($upd);

		      $ins="INSERT INTO auditoria (tabla,operacion,descripcion,fecha_hora)
			 VALUES ('facturas','actualizar','Se actualizo la factura $cod_factura en fecha $hoy el estado  = 2','$hoy')";

		}
		else
		{
		      if($cant_cuotas_pagas < $cant_cuotas) //&& $cant_cuotas_pagas > 0)
		      {
			    $upd="UPDATE facturas SET estado='1', cuotaspagas=$cant_cuotas_pagas WHERE codfactura=$cod_factura";
			    //echo $upd."<br>";	
			    $rs=mysql_query($upd);

			    $ins="INSERT INTO auditoria (tabla,operacion,descripcion,fecha_hora)
			 	VALUES ('facturas','actualizar','Se actualizo la factura $cod_factura en fecha $hoy el estado  = 1','$hoy')";
		      }
		}
		//echo $ins."<br>";
		$rs=mysql_query($ins);

	}	
/*
	if($cob > 0)
	  echo "Saldo positivo: ".$cob."<br>";
	else
	  echo "Saldo negativo: ".$cob."<br>";
*/

/*
	$sel="SELECT codigo FROM tesoreria_cuentas WHERE descripcion like '%$cuenta_destino%'";
	//echo $sel."<br>";
	$rs=mysql_query($sel);
	$cod_cuenta_destino=mysql_result($rs,0,"codigo");

/*
	echo  'Fecha: '.$fecha.'<br>'.
	      'cod_cuenta: '.$cod_cuenta.'<br>'.
	      'cod_forma_pago: '.$cod_forma_pago.'<br>'.
	      'cod_moneda: '.$cod_moneda.'<br>'.
	      'moneda cuenta: '.$moneda.'<br>'.
	      'cotizacion: '.$cotizacion.'<br>'.
	      'valor: '.$valor.'<br>'.
	      'cheque_nro: '.$cheque_nro.'<br>'.
	      'cuenta_nro: '.$cuenta_nro.'<br>'.
	      'banco: '.$cod_banco.'<br>'.
	      'fecha_cheque: '.$fecha_cheque.'<br>'.
	      'fecha_cheque_venc: '.$fecha_venc_cheque.'<br>'.
	      'librador : '.$librador.'<br>'.
	      'cod_cuenta_destino: '.$cod_cuenta_destino.'<br>';
*/
		
/*
	//************** ultimo valor de codigo ***************
	$sel="SELECT max(codigo) as maximo FROM cuentas_cobrar_detalles";
	$rs=mysql_query($sel);
	$codigo=mysql_result($rs,0,"maximo")+1;

	//insertar en cuentas_cobrar_detalles
	$ins="INSERT INTO cuentas_cobrar_detalles 
		(codigo,cod_cuenta,fecha,cod_forma_pago,cod_moneda,cotizacion,valor,cheque_nro,cuenta_nro,cod_banco,fecha_cheque,
		  fecha_venc_cheque,librador,cod_cuenta_destino) 
		VALUES ($codigo,$cod_cuenta,'$hoy',$cod_forma_pago,$cod_moneda,'$cotizacion','$valor','$cheque_nro','$cuenta_nro',$cod_banco,'$fecha_cheque',
			'$fecha_venc_cheque','$librador',$cod_cuenta_destino)";
	//echo $ins."<br>";
	$rs_operacion=mysql_query($ins);

	
	//************ cambiar estado de cuenta *************

	//cambiar formato de valores para los calculos
/*		
	$valor2=str_replace(".","",$valor);
	$cuota2=str_replace(".","",$cuota_cuenta);

	if($moneda_cuenta!=1)
	{	//$valor2=str_replace(",",".",$valor2);
		$cuota2=str_replace(",",".",$cuota2);
	}
*/
/*
	$valor2=coma2decimal($valor);
	$cuota2=coma2decimal($cuota_cuenta);

	if($cotizacion=="")
		$cotizacion=1;
	else
		$cotizacion=coma2decimal($cotizacion);

	$sel="SELECT decimales FROM moneda WHERE codigo=$moneda_cuenta";
	$rs=mysql_query($sel);
	$decimales=mysql_result($rs,0,"decimales");

	if($cod_moneda != $moneda_cuenta)
	{	$sel="SELECT operacion FROM cotizaciones WHERE moneda_origen=$cod_moneda AND moneda_destino=$moneda_cuenta";
		$rs=mysql_query($sel);
		$ope=mysql_result($rs,0,"operacion");		
	
		//echo "Operacion: ".$ope."<br>";

		if($ope=="VENTA")
			$resultado=round($valor2/$cotizacion,2);
		else
			$resultado=round($valor2*$cotizacion,2);
	}
	else
		$resultado=$valor2;
	
	//calcula la diferencia entre lo cobrado y la cuota		
	/*	estado de cuentas
		0 -> pendiente
		1 -> parcial
		2 -> cobrado
	*/
/*
	$resultado2=$resultado;
	$contador=0;	

	$sel="SELECT min(codigo) as minimo,count(codigo) as cantidad, valor_pagado FROM cuentas_cobrar WHERE cod_factura=$cod_factura AND estado<'2'";
	$rs=mysql_query($sel);
	$cod_cuenta_pagada=mysql_result($rs,0,"minimo");
	$cantidad_cuotas=mysql_result($rs,0,"cantidad");
	$valor_pagado=mysql_result($rs,0,"valor_pagado");

	//echo "valor pagado existente: ".$valor_pagado."<br>";	
	
	//$valor_pagado=str_replace(".","",$valor_pagado);	
	//$valor_pagado=str_replace(",",".",$valor_pagado);
	$valor_pagado=coma2decimal($valor_pagado);
	//echo "valor pagado existente 2: ".$valor_pagado."<br>";

	$resultado+=$valor_pagado;
	$resultado=number_format($resultado,$decimales,".","");	
	
	$cant_cuotas_pagas=$resultado/$cuota2;
	/*
	if($cant_cuotas_pagas > $cantidad_cuotas)
	    $cant_cuotas_pagas=$cantidad_cuotas;
	*/
	/*
	echo "moneda cuenta: ".$moneda_cuenta."<br>valor: ".$valor2."<br>cuota: ".$cuota2."<br>cotizacion: ".$cotizacion."<br>resultado cotiz: ".$resultado2.
		"<br>resultado final: ".$resultado."<br>cantidad cuotas pagas: ".$cant_cuotas_pagas."<br>";;	
	*/
	//$cod_cuenta_pagada=$cod_cuenta;
/*
	while($contador < $cant_cuotas_pagas)
	{
		if($contador < $cantidad_cuotas)
		{
			//echo "valor: ".$resultado." - ";
			
			if($resultado > $cuota2)
			{	$valor_pagado=$cuota2;
				$resultado=$resultado-$cuota2;
				$resultado=number_format($resultado,$decimales,".","");
				$estado_cuenta=2;
			}
			else
			{	if($resultado == $cuota2)
					$estado_cuenta=2;
				else
					$estado_cuenta=1;

				$valor_pagado=$resultado;
			}

			//convertir al formato con coma
			$valor_pagado=number_format($valor_pagado,$decimales,",",".");
			$upd="UPDATE cuentas_cobrar SET valor_pagado='$valor_pagado', estado='$estado_cuenta' WHERE codigo=$cod_cuenta_pagada";
			//echo $upd."<br>";
			$rs=mysql_query($upd);

			//auditoria
			
			$ins="INSERT INTO auditoria (tabla,operacion,descripcion,fecha_hora)
			  VALUES ('cuentas_cobrar','actualizar','Se actualizo la cuenta $cod_cuenta_pagada en fecha $hoy el valor pagado = $valor_pagado y el estado  = $estado_cuenta','$hoy')";
			$rs=mysql_query($ins);

		}
		else
		{
			$saldo=$resultado;
			//echo $saldo."<br>";
			break;
		}

		$contador++;
		$cod_cuenta_pagada++;
	}
*/



	//***************************************************************
	//*************** actualizar valor en tesoreria *****************
	//***************************************************************
/*
	echo "<br>TESORERIA <br><br>";

	for($i=0; $i < sizeof($vfilas)-1; $i++)
	{
		$vceldas=explode("~",$vfilas[$i]);

		// ****** cuenta destino******
		$sql_cuenta_destino="SELECT codigo,valor,moneda FROM tesoreria_cuentas WHERE descripcion like '%$vceldas[10]%'";
		//echo $sql_cuenta_destino."<br>";
		$rs_cuenta_destino=mysql_query($sql_cuenta_destino);
		$cod_cuenta_destino=mysql_result($rs_cuenta_destino,0,"codigo");
		$valor=mysql_result($rs_cuenta_destino,0,"valor");
		$moneda_tes=mysql_result($rs_cuenta_destino,0,"moneda");

/*
		$sel="SELECT valor,moneda FROM tesoreria_cuentas WHERE codigo=$cod_cuenta_destino";
		$rs=mysql_query($sel);
		$valor=mysql_result($rs,0,"valor");
		$moneda_tes=mysql_result($rs,0,"moneda");

		$sel="SELECT decimales FROM moneda WHERE codigo=$moneda_tes";
		$rs=mysql_query($sel);
		$decimales_tes=mysql_result($rs,0,"decimales");

		if($valor=="")//primera vez
			$valor=0;
	
		$valor_tes=coma2decimal($valor);
		//$valor_tes=number_format($valor,$decimales_tes,".","");		
		$valor_tes+=$valor2;

		$valor_tes=number_format($valor_tes,$decimales_tes,",",".");

		$upd="UPDATE tesoreria_cuentas SET valor='$valor_tes' WHERE codigo=$cod_cuenta_destino";
		echo $upd."<br>";	
		//$rs=mysql_query($upd);

		//*********************************************************************
		//*************** actualizar en factura si necesario ******************
		//*********************************************************************
		$sel="SELECT count(codigo) as cant FROM cuentas_cobrar WHERE cod_factura=$cod_factura";
		$rs=mysql_query($sel);
		$cant_cuotas=mysql_result($rs,0,"cant");

		$sel="SELECT count(codigo) as cant FROM cuentas_cobrar WHERE cod_factura=$cod_factura AND estado='2'";
		$rs=mysql_query($sel);
		$cant_cuotas_pagas=mysql_result($rs,0,"cant");

		echo "Cant. cuotas: ".$cant_cuotas."<br>Cuotas pagadas: ".$cant_cuotas_pagas."<br>";
		if($cant_cuotas == $cant_cuotas_pagas)
		{
		      $upd="UPDATE facturas SET estado='2' WHERE codfactura=$cod_factura";
		      echo $upd."<br>";	
		      //$rs=mysql_query($upd);

		      $ins="INSERT INTO auditoria (tabla,operacion,descripcion,fecha_hora)
			 VALUES ('facturas','actualizar','Se actualizo la factura $cod_factura en fecha $hoy el estado  = 2','$hoy')";

		}
		else
		{
		      if($cant_cuotas_pagas < $cant_cuotas) //&& $cant_cuotas_pagas > 0)
		      {
			    $upd="UPDATE facturas SET estado='1' WHERE codfactura=$cod_factura";
			    echo $upd."<br>";	
			    //$rs=mysql_query($upd);

			    $ins="INSERT INTO auditoria (tabla,operacion,descripcion,fecha_hora)
			 	VALUES ('facturas','actualizar','Se actualizo la factura $cod_factura en fecha $hoy el estado  = 1','$hoy')";
		      }
		}
		echo $ins."<br>";
		//$rs=mysql_query($ins);

	}	*/
        //fede pongo en 1 para que imprima
        //$rs_operacion = 1;
	if ($rs_operacion) 
	{ 	$mensaje="La cuenta ha sido cobrada correctamente"; 
		//auditoria cuentras_cobrar_detalles		
		$ins="INSERT INTO auditoria (tabla,operacion,descripcion,fecha_hora)
			  VALUES ('cuentas_cobrar_detalles','insertar','Se inserto registro de detalles de la cuenta $cod_cuenta en fecha $hoy con la forma de pago = $cod_forma_pago el valor de $valor en la cuenta destino $cod_cuenta_destino','$hoy')";
		$rs=mysql_query($ins);
	}

	$cabecera1="Inicio >> Ventas &gt;&gt; Nueva Cuenta Cobrar ";
	$cabecera2="INSERTAR CUENTA COBRAR ";
}

if ($accion=="modificar") {
	$codfacturatmp=$_POST["codfacturatmp"];
	$codfactura=$codfacturatmp;

	$codcliente=$_POST["codcliente"];
	$fecha=explota($_POST["fecha"]);
	$fecha_venc=explota($_POST["fechaVenc"]);
	$total_factura=$_POST["total2"];
	$iva=$_POST["totaliva2"];
	$cuotas=$_POST["cuotas"];	
	$cod_mon=$_POST["cod_moneda2"];
	$tabla_lineas=$_POST["tabla_lineas2"];

	//echo "Cod fac: ".$codfacturatmp."</br>Cod cli: ".$codcliente."</br>Fecha: ".$fecha."</br>Fecha venc: ".$fecha_venc."</br>Total fac: ".$total_factura."</br>Iva: ".$iva."</br>Cuotas: ".$cuotas."</br>Moneda: ".$cod_mon."</br>";
	//echo "TABLA: ".$tabla_lineas."</br>";

	$query="SELECT simbolo,descripcion FROM moneda WHERE codigo='$cod_mon'";
	$rs_query=mysql_query($query);
	$smoneda=mysql_result($rs_query,0,"simbolo");
	$moneda=mysql_result($rs_query,0,"descripcion");

	$vfilas=explode("@",$tabla_lineas);

	//actualizar datos de la factura
	$fac="UPDATE facturas SET iva='$iva', totalfactura='$total_factura' WHERE codfactura=".$codfacturatmp."";	         
	//echo "Actualizar factura ".$fac."</br>";
	$rs_up_fac=mysql_query($fac) or die("Error actualizar ".mysql_error());


	//controlar lo que se quito
	$query_operacion="SELECT numlinea FROM factulinea WHERE codfactura=".$codfacturatmp." ORDER BY numlinea";
	$rs_operacion=mysql_query($query_operacion);
	
	$contador=0;
	while ($contador < mysql_num_rows($rs_operacion)) 
	{   $nl=mysql_result($rs_operacion,$contador,"numlinea");
	    $sw=0;

	    for($i=0; $i < (sizeof($vfilas)-1); $i++)
	    {   
		  $vceldas=explode("~",$vfilas[$i]);
		  if($nl == $i)
		  {	
		      $sw=1;
		  }
	    }
	    
	    if($sw==0)
	    {
		$del_lineas="DELETE FROM factulinea WHERE codfactura=$codfacturatmp AND numlinea=$nl";
		//echo "Borrar factulinea ".$del_lineas."</br>";
		$rs_del_lineas=mysql_query($del_lineas) or die("Error borrar".mysql_error());
	    }
	    $contador++;
	}

	//actualizar o agregar
	for($i=0; $i < (sizeof($vfilas)-1); $i++)
	{   
	    $vceldas=explode("~",$vfilas[$i]);

	    $query_operacion="SELECT count(*) as cr FROM factulinea WHERE codfactura=".$codfacturatmp." AND numlinea=".$i."";
	    $rs_operacion=mysql_query($query_operacion);
	    $cr=mysql_result($rs_operacion,0,"cr");
	    
	    if ($cr==1) 
	    {	    $lineas="UPDATE factulinea SET cantidad='$vceldas[0]', descripcion ='$vceldas[1]', precio = '$vceldas[2]',
			excentas = '$vceldas[3]', por5 = '$vceldas[5]', por10 = '$vceldas[7]' 
			WHERE codfactura=$codfacturatmp AND numlinea=$i";
	         
			//echo "Actualizar factulinea ".$lineas."</br>";
			$rs_up_lineas=mysql_query($lineas) or die("Error actualizar ".mysql_error());
	    }
	    else
	    {
		  $lineas="INSERT INTO factulinea (codfactura,numlinea,cantidad,descripcion,precio,excentas,por5,por10) 
			VALUES ('$codfacturatmp','$i','$vceldas[0]','$vceldas[1]','$vceldas[2]','$vceldas[3]','$vceldas[5]','$vceldas[7]')";

		  //echo "Insertar factulinea ".$lineas."</br>";
		  $rs_ins_lineas=mysql_query($lineas) or die("Error insertar ".mysql_error());	
	    }
	}

	if ($rs_lineas) { $mensaje="Los datos de la factura han sido modificados correctamente"; }
	$cabecera1="Inicio >> Ventas &gt;&gt; Modificar Factura ";
	$cabecera2="MODIFICAR FACTURA ";

}

if ($accion=="baja") {
	$codfactura=$_GET["codfactura"];
	$query="UPDATE facturas SET borrado=1 WHERE codfactura='$codfactura'";
	$rs_query=mysql_query($query);
	$query="UPDATE factulinea SET borrado=1 WHERE codfactura='$codfactura'";
	$rs_tmp=mysql_query($query);
		
	if ($rs_query) { $mensaje="La factura ha sido eliminada correctamente"; }
	$cabecera1="Inicio >> Ventas &gt;&gt; Eliminar Factura";
	$cabecera2="ELIMINAR FACTURA";
	$query_mostrar="SELECT * FROM facturas WHERE codfactura='$codfactura'";
	$rs_mostrar=mysql_query($query_mostrar);
	$codcliente=mysql_result($rs_mostrar,0,"codcliente");
	$fecha=mysql_result($rs_mostrar,0,"fecha");
	$cuotas=mysql_result($rs_mostrar,0,"cuotas");
	$iva=mysql_result($rs_mostrar,0,"iva");
	$total_factura=mysql_result($rs_mostrar,0,"totalfactura");
}

?>

<html>
	<head>
		<title>Principal</title>
		<link href="../estilos/estilos.css" type="text/css" rel="stylesheet">
		<script language="javascript">
		var cursor;
		if (document.all) {
		// Está utilizando EXPLORER
		cursor='hand';
		} else {
		// Está utilizando MOZILLA/NETSCAPE
		cursor='pointer';
		}
		
		function aceptar() {
			location.href="index.php";
		}
		
		function imprimir(codfactura) {
			window.open("../fpdf/imprimir_factura.php?codfactura="+codfactura);
		}
		
		</script>
	</head>
	<body>
	    <div id="pagina">
		<div id="zonaContenido">
		    <div align="center">
			<div id="tituloForm" class="header"><?php echo $cabecera2?></div>
			<div id="frmBusqueda">
			    <table class="fuente8" width="98%" cellspacing=0 cellpadding=3 border=0>
				<tr>
				    <td width="15%"></td>
				    <td width="85%" colspan="2" class="mensaje"><?php echo $mensaje;?></td>
				</tr>				
			    </table>
			</div>
			<div id="botonBusqueda">
			  <div align="center">
			      <img src="../img/botonaceptar.jpg" width="85" height="22" onClick="aceptar()" border="1" onMouseOver="style.cursor=cursor">			      
			  </div>
		  	</div>
		    </div><!-- Fin de centrado -->
		</div><!-- Fin de contenido -->
	    </div><!-- Fin de pagina -->
	</body>
</html>
